object Fz: TFz Left = 191 Top = 16 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsDialog Caption = 'Nastaven� zvukov�ho v�stupu' ClientHeight = 473 ClientWidth = 592 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnPaint = FormPaint PixelsPerInch = 96 TextHeight = 13 object Bevel5: TBevel Left = 7 Top = 10 Width = 582 Height = 152 Shape = bsFrame end object Bevel4: TBevel Left = 57 Top = 25 Width = 526 Height = 131 end object Label12: TLabel Left = 11 Top = 21 Width = 31 Height = 13 Alignment = taCenter AutoSize = False Caption = 'V�ce' Font.Charset = DEFAULT_CHARSET Font.Color = clTeal Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 9 Top = 144 Width = 31 Height = 13 Alignment = taCenter AutoSize = False Caption = 'M�n�' Font.Charset = DEFAULT_CHARSET Font.Color = clTeal Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label14: TLabel Left = 16 Top = 5 Width = 76 Height = 13 Alignment = taCenter Caption = ' Pr�b�h sign�lu ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Bevel2: TBevel Left = 287 Top = 268 Width = 295 Height = 128 end object Bevel1: TBevel Left = 280 Top = 254 Width = 309 Height = 150 Shape = bsFrame end object Label6: TLabel Left = 288 Top = 248 Width = 73 Height = 13 Caption = ' Pr�b�h ADSR ' end object TBps: TTrackBar Left = 17 Top = 33 Width = 25 Height = 113 LineSize = 5 Max = 19 Orientation = trVertical PageSize = 10 Frequency = 2 Position = 14 SelEnd = 0 SelStart = 0 TabOrder = 0 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBpsChange end object PC1: TPageControl Left = 6 Top = 165 Width = 583 Height = 304 ActivePage = TSzn TabOrder = 1 OnChange = PC1Change object TSzn: TTabSheet Caption = 'Z�kladn� nastaven�' object GroupBox2: TGroupBox Left = 181 Top = 10 Width = 77 Height = 255 Caption = ' Hlasitost ' TabOrder = 0 object Label9: TLabel Left = 3 Top = 15 Width = 31 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Lev�' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label8: TLabel Left = 37 Top = 15 Width = 31 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Prav�' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end end object RGts: TRadioGroup Left = 5 Top = 10 Width = 88 Height = 118 Caption = ' Tvar sign�lu ' ItemIndex = 0 Items.Strings = ( 'Sinusovka' 'Obd�ln�k' 'Troj�heln�k' 'Pila' '�um') TabOrder = 1 OnClick = RGtsClick end object TBl: TTrackBar Left = 190 Top = 37 Width = 25 Height = 220 LineSize = 5 Max = 100 Orientation = trVertical PageSize = 10 Frequency = 10 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 2 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBlChange end object TBp: TTrackBar Left = 225 Top = 37 Width = 25 Height = 220 LineSize = 5 Max = 100 Orientation = trVertical PageSize = 10 Frequency = 10 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 3 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBpChange end object Button6: TButton Left = 13 Top = 223 Width = 70 Height = 25 Caption = 'P�ehr�t' TabOrder = 4 OnClick = Button6Click end object Button9: TButton Left = 13 Top = 247 Width = 70 Height = 25 Caption = 'Zastavit' TabOrder = 5 OnClick = Button9Click end object ChBs: TCheckBox Left = 105 Top = 245 Width = 49 Height = 17 Caption = 'Stereo' Checked = True State = cbChecked TabOrder = 6 end object RGk: TRadioGroup Left = 96 Top = 10 Width = 82 Height = 70 Caption = ' Kvalita ' ItemIndex = 0 Items.Strings = ( '16 bit�' ' 8 bit�') TabOrder = 7 end object RGsr: TRadioGroup Left = 96 Top = 87 Width = 82 Height = 70 Caption = ' Sample Rate ' ItemIndex = 0 Items.Strings = ( '96000' '44100') TabOrder = 8 end object RGp: TRadioGroup Left = 96 Top = 168 Width = 82 Height = 70 Caption = ' P�ahr�vat ' ItemIndex = 0 Items.Strings = ( 'bez ADSR' ' s ADSR') TabOrder = 9 end object GBn: TGroupBox Left = 5 Top = 131 Width = 88 Height = 40 Caption = 'Nota' TabOrder = 10 object CBn: TComboBox Left = 5 Top = 14 Width = 78 Height = 21 ItemHeight = 13 Items.Strings = ( 'c1' 'cis1' 'd1' 'dis1' 'e1' 'f1' 'fis1' 'g1' 'gis1' 'a1' 'ais1' 'h1' 'c2' 'cis2' 'd2' 'dis2' 'e2' 'f2' 'fis2' 'g2' 'gis2' 'a2' 'ais2' 'h2' 'c3' 'cis3' 'd3' 'dis3' 'e3' 'f3' 'fis3' 'g3' 'gis3' 'a3' 'ais3' 'h3' 'c4' 'cis4' 'd4' 'dis4' 'e4' 'f4' 'fis4' 'g4' 'gis4') TabOrder = 0 end end object GBd: TGroupBox Left = 5 Top = 171 Width = 88 Height = 40 Caption = 'D�lka' TabOrder = 11 object CBd: TComboBox Left = 5 Top = 14 Width = 78 Height = 21 ItemHeight = 13 Items.Strings = ( '1/32' '3/64' '1/16' '3/32' '1/8' '3/16' '1/4' '3/8' '1/2' '3/4' '1/1' '3/2' '2/1' '3/1') TabOrder = 0 end end end object TSam: TTabSheet Caption = 'Amplitudov� modulace' ImageIndex = 1 object Bevel14: TBevel Left = 5 Top = 16 Width = 558 Height = 256 Shape = bsFrame end object Bevel6: TBevel Left = 19 Top = 29 Width = 68 Height = 222 Shape = bsFrame end object Bevel7: TBevel Left = 85 Top = 29 Width = 68 Height = 222 Shape = bsFrame end object Bevel8: TBevel Left = 151 Top = 29 Width = 68 Height = 222 Shape = bsFrame end object Bevel9: TBevel Left = 217 Top = 29 Width = 68 Height = 222 Shape = bsFrame end object Bevel10: TBevel Left = 283 Top = 29 Width = 68 Height = 222 Shape = bsFrame end object Bevel11: TBevel Left = 349 Top = 29 Width = 68 Height = 222 Shape = bsFrame end object Bevel12: TBevel Left = 415 Top = 29 Width = 68 Height = 222 Shape = bsFrame end object Bevel13: TBevel Left = 481 Top = 29 Width = 68 Height = 222 Shape = bsFrame end object Label15: TLabel Left = 24 Top = 23 Width = 50 Height = 13 Alignment = taCenter Caption = ' �rov�� 1 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label16: TLabel Left = 89 Top = 24 Width = 50 Height = 13 Alignment = taCenter Caption = ' �rov�� 2 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label17: TLabel Left = 155 Top = 24 Width = 50 Height = 13 Alignment = taCenter Caption = ' �rov�� 3 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label18: TLabel Left = 221 Top = 24 Width = 50 Height = 13 Alignment = taCenter Caption = ' �rov�� 4 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label19: TLabel Left = 287 Top = 24 Width = 50 Height = 13 Alignment = taCenter Caption = ' �rov�� 5 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label20: TLabel Left = 353 Top = 24 Width = 50 Height = 13 Alignment = taCenter Caption = ' �rov�� 6 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label21: TLabel Left = 419 Top = 24 Width = 50 Height = 13 Alignment = taCenter Caption = ' �rov�� 7 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label22: TLabel Left = 485 Top = 24 Width = 50 Height = 13 Alignment = taCenter Caption = ' �rov�� 8 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label23: TLabel Left = 13 Top = 10 Width = 113 Height = 13 Alignment = taCenter Caption = ' Amplitudov� modulace ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Panel6: TPanel Left = 22 Top = 40 Width = 29 Height = 20 Hint = 'Amplitude' BevelInner = bvLowered BevelOuter = bvLowered Caption = '0%' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 end object TBa1: TTrackBar Left = 27 Top = 60 Width = 25 Height = 89 Hint = 'Amplitude' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 1 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBa1Change end object Panel7: TPanel Left = 54 Top = 40 Width = 29 Height = 20 Hint = 'Frequency' BevelInner = bvLowered BevelOuter = bvLowered Caption = 'x0.1' Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 2 end object TBb1: TTrackBar Left = 58 Top = 60 Width = 25 Height = 89 Hint = 'Frequency' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 45 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 3 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBb1Change end object RGs1: TRadioGroup Left = 24 Top = 144 Width = 58 Height = 102 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Sin' 'Obd' 'Tro' 'Pil' '�um') ParentFont = False TabOrder = 4 OnClick = RGs1Click end object Panel8: TPanel Left = 88 Top = 41 Width = 29 Height = 20 Hint = 'Amplitude' BevelInner = bvLowered BevelOuter = bvLowered Caption = '0%' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 5 end object TBa2: TTrackBar Left = 93 Top = 61 Width = 25 Height = 89 Hint = 'Amplitude' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 6 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBa1Change end object Panel9: TPanel Left = 120 Top = 41 Width = 29 Height = 20 Hint = 'Frequency' BevelInner = bvLowered BevelOuter = bvLowered Caption = 'x0.1' Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 7 end object TBb2: TTrackBar Left = 124 Top = 61 Width = 25 Height = 89 Hint = 'Frequency' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 40 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 8 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBb1Change end object RGs2: TRadioGroup Left = 90 Top = 144 Width = 58 Height = 102 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Sin' 'Obd' 'Tro' 'Pil' '�um') ParentFont = False TabOrder = 9 OnClick = RGs1Click end object Panel10: TPanel Left = 154 Top = 41 Width = 29 Height = 20 Hint = 'Amplitude' BevelInner = bvLowered BevelOuter = bvLowered Caption = '0%' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 10 end object TBa3: TTrackBar Left = 159 Top = 61 Width = 25 Height = 89 Hint = 'Amplitude' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 11 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBa1Change end object Panel11: TPanel Left = 186 Top = 41 Width = 29 Height = 20 Hint = 'Frequency' BevelInner = bvLowered BevelOuter = bvLowered Caption = 'x0.1' Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 12 end object TBb3: TTrackBar Left = 190 Top = 61 Width = 25 Height = 89 Hint = 'Frequency' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 35 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 13 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBb1Change end object RGs3: TRadioGroup Left = 156 Top = 144 Width = 58 Height = 102 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Sin' 'Obd' 'Tro' 'Pil' '�um') ParentFont = False TabOrder = 14 OnClick = RGs1Click end object Panel12: TPanel Left = 220 Top = 41 Width = 29 Height = 20 Hint = 'Amplitude' BevelInner = bvLowered BevelOuter = bvLowered Caption = '0%' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 15 end object TBa4: TTrackBar Left = 225 Top = 61 Width = 25 Height = 89 Hint = 'Amplitude' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 16 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBa1Change end object Panel13: TPanel Left = 252 Top = 41 Width = 29 Height = 20 Hint = 'Frequency' BevelInner = bvLowered BevelOuter = bvLowered Caption = 'x0.1' Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 17 end object TBb4: TTrackBar Left = 256 Top = 61 Width = 25 Height = 89 Hint = 'Frequency' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 30 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 18 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBb1Change end object RGs4: TRadioGroup Left = 222 Top = 144 Width = 58 Height = 102 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Sin' 'Obd' 'Tro' 'Pil' '�um') ParentFont = False TabOrder = 19 OnClick = RGs1Click end object Panel14: TPanel Left = 286 Top = 41 Width = 29 Height = 20 Hint = 'Amplitude' BevelInner = bvLowered BevelOuter = bvLowered Caption = '0%' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 20 end object TBa5: TTrackBar Left = 291 Top = 61 Width = 25 Height = 89 Hint = 'Amplitude' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 21 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBa1Change end object Panel15: TPanel Left = 318 Top = 41 Width = 29 Height = 20 Hint = 'Frequency' BevelInner = bvLowered BevelOuter = bvLowered Caption = 'x0.1' Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 22 end object TBb5: TTrackBar Left = 322 Top = 61 Width = 25 Height = 89 Hint = 'Frequency' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 25 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 23 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBb1Change end object RGs5: TRadioGroup Left = 288 Top = 144 Width = 58 Height = 102 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Sin' 'Obd' 'Tro' 'Pil' '�um') ParentFont = False TabOrder = 24 OnClick = RGs1Click end object Panel16: TPanel Left = 352 Top = 41 Width = 29 Height = 20 Hint = 'Amplitude' BevelInner = bvLowered BevelOuter = bvLowered Caption = '0%' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 25 end object TBa6: TTrackBar Left = 356 Top = 61 Width = 25 Height = 89 Hint = 'Amplitude' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 26 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBa1Change end object Panel17: TPanel Left = 384 Top = 41 Width = 29 Height = 20 Hint = 'Frequency' BevelInner = bvLowered BevelOuter = bvLowered Caption = 'x0.1' Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 27 end object TBb6: TTrackBar Left = 388 Top = 61 Width = 25 Height = 89 Hint = 'Frequency' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 20 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 28 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBb1Change end object RGs6: TRadioGroup Left = 354 Top = 144 Width = 58 Height = 102 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Sin' 'Obd' 'Tro' 'Pil' '�um') ParentFont = False TabOrder = 29 OnClick = RGs1Click end object Panel18: TPanel Left = 418 Top = 41 Width = 29 Height = 20 Hint = 'Amplitude' BevelInner = bvLowered BevelOuter = bvLowered Caption = '0%' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 30 end object TBa7: TTrackBar Left = 423 Top = 61 Width = 25 Height = 89 Hint = 'Amplitude' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 31 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBa1Change end object Panel19: TPanel Left = 450 Top = 41 Width = 29 Height = 20 Hint = 'Frequency' BevelInner = bvLowered BevelOuter = bvLowered Caption = 'x0.1' Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 32 end object TBb7: TTrackBar Left = 454 Top = 61 Width = 25 Height = 89 Hint = 'Frequency' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 15 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 33 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBb1Change end object RGs7: TRadioGroup Left = 420 Top = 144 Width = 58 Height = 102 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Sin' 'Obd' 'Tro' 'Pil' '�um') ParentFont = False TabOrder = 34 OnClick = RGs1Click end object Panel20: TPanel Left = 484 Top = 41 Width = 29 Height = 20 Hint = 'Amplitude' BevelInner = bvLowered BevelOuter = bvLowered Caption = '0%' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 35 end object TBa8: TTrackBar Left = 489 Top = 61 Width = 25 Height = 89 Hint = 'Amplitude' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 50 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 36 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBa1Change end object Panel21: TPanel Left = 516 Top = 41 Width = 29 Height = 20 Hint = 'Frequency' BevelInner = bvLowered BevelOuter = bvLowered Caption = 'x0.1' Color = clWhite ParentShowHint = False ShowHint = True TabOrder = 37 end object TBb8: TTrackBar Left = 520 Top = 61 Width = 25 Height = 89 Hint = 'Frequency' LineSize = 5 Max = 50 Orientation = trVertical ParentShowHint = False PageSize = 10 Frequency = 5 Position = 10 SelEnd = 0 SelStart = 0 ShowHint = True TabOrder = 38 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBb1Change end object RGs8: TRadioGroup Left = 486 Top = 144 Width = 58 Height = 102 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Sin' 'Obd' 'Tro' 'Pil' '�um') ParentFont = False TabOrder = 39 OnClick = RGs1Click end object RBa: TRadioButton Left = 488 Top = 254 Width = 65 Height = 14 Caption = 'Absolute' TabOrder = 40 OnClick = TBb1Change end object RBm: TRadioButton Left = 424 Top = 254 Width = 58 Height = 14 Caption = 'Multiply' Checked = True TabOrder = 41 TabStop = True OnClick = TBb1Change end object Button26: TButton Left = 20 Top = 253 Width = 62 Height = 16 Caption = 'Reset' TabOrder = 42 OnClick = Button26Click end object Button1: TButton Left = 89 Top = 253 Width = 62 Height = 16 Caption = 'P�ehr�t' TabOrder = 43 OnClick = Button6Click end end object TSadsr: TTabSheet Caption = 'ADSR' ImageIndex = 2 object Bevel3: TBevel Left = 10 Top = 15 Width = 247 Height = 250 Shape = bsFrame end object Label7: TLabel Left = 17 Top = 24 Width = 31 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Attack' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 109 Top = 24 Width = 31 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Decay' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 154 Top = 24 Width = 36 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Sustain' Font.Charset = DEFAULT_CHARSET Font.Color = clGreen Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 200 Top = 24 Width = 38 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Release' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label10: TLabel Left = 22 Top = 10 Width = 51 Height = 13 Caption = ' Envelope ' end object Label11: TLabel Left = 63 Top = 24 Width = 31 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Hold' Font.Charset = DEFAULT_CHARSET Font.Color = clPurple Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object TBa: TTrackBar Left = 23 Top = 61 Width = 25 Height = 196 LineSize = 5 Max = 100 Orientation = trVertical PageSize = 10 Frequency = 10 Position = 90 SelEnd = 0 SelStart = 0 TabOrder = 0 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBaChange end object TBd: TTrackBar Left = 117 Top = 61 Width = 25 Height = 196 LineSize = 5 Max = 100 Orientation = trVertical PageSize = 10 Frequency = 10 Position = 80 SelEnd = 0 SelStart = 0 TabOrder = 1 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBaChange end object TBs: TTrackBar Left = 163 Top = 61 Width = 25 Height = 196 LineSize = 5 Max = 100 Orientation = trVertical PageSize = 10 Frequency = 10 Position = 50 SelEnd = 0 SelStart = 0 TabOrder = 2 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBaChange end object TBr: TTrackBar Left = 210 Top = 61 Width = 25 Height = 188 LineSize = 5 Max = 100 Orientation = trVertical PageSize = 10 Frequency = 10 Position = 90 SelEnd = 0 SelStart = 0 TabOrder = 3 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBaChange end object Panel1: TPanel Left = 16 Top = 39 Width = 32 Height = 20 BevelInner = bvLowered BevelOuter = bvLowered Caption = '100%' Color = clWhite TabOrder = 4 end object Panel2: TPanel Left = 109 Top = 39 Width = 32 Height = 20 BevelInner = bvLowered BevelOuter = bvLowered Caption = '100%' Color = clWhite TabOrder = 5 end object Panel3: TPanel Left = 156 Top = 39 Width = 32 Height = 20 BevelInner = bvLowered BevelOuter = bvLowered Caption = '100%' Color = clWhite TabOrder = 6 end object Panel4: TPanel Left = 202 Top = 39 Width = 32 Height = 20 BevelInner = bvLowered BevelOuter = bvLowered Caption = '100%' Color = clWhite TabOrder = 7 end object Panel5: TPanel Left = 63 Top = 39 Width = 32 Height = 20 BevelInner = bvLowered BevelOuter = bvLowered Caption = '100%' Color = clWhite TabOrder = 8 end object TBh: TTrackBar Left = 70 Top = 61 Width = 25 Height = 196 LineSize = 5 Max = 100 Orientation = trVertical PageSize = 10 Frequency = 10 Position = 90 SelEnd = 0 SelStart = 0 TabOrder = 9 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBaChange end end end object ToneGen1: TToneGen Frequency = 100 Hold = 10 Async = False AMAmplitude = 30 AMWaveform = tgSine AMFrequency = 0.300000011920929000 Left = 58 Top = 26 AMArrayData = { 070000001E000000000000009A99993E00000000000000000000C03F00000000 000000000000A04100000000000000000000A04100000000000000000000A041 00000000000000000000A04100000000000000000000A0410000000002000000 0000A041} end object WaveTTG: TToneGen Frequency = 800 Duration = 50 Resolution = tg8Bit Quality = tgLoQ AMAmplitude = 30 AMWaveform = tgSquare AMFrequency = 4.000000000000000000 Left = 86 Top = 26 AMArrayData = { 070000001E00000001000000000080400A000000010000000000003F00000000 040000000000C03F000000000000000000000040000000000000000000002040 0000000000000000000040400000000000000000000060400000000000000000 00008040} end end